Adapt vc-src to the old-new vc-checkin API

* lisp/vc/vc-src.el (vc-src-checkin): Accept and ignore an
additional optional parameter.

diff --git a/lisp/vc/vc-src.el b/lisp/vc/vc-src.el
index d9aa1b13e88e1df631c996a9a12c388589adfdcd..69e403668b15243c1d1ecc1999fe9c22439c299a 100644 (file)
--- a/lisp/vc/vc-src.el
+++ b/lisp/vc/vc-src.el
@@ -227,7 +227,7 @@ This function differs from vc-do-command in that it invokes `vc-src-program'."
                                           file
                                         (file-name-directory file)))))
 
-(defun vc-src-checkin (files comment)
+(defun vc-src-checkin (files comment &optional _rev)
   "SRC-specific version of `vc-backend-checkin'.
 REV is ignored."
   (vc-src-command nil files "commit" "-m" comment))